\#macro to detect icon drag
IF NOT STILLDOWN THEN 425
goto 431
puppet sprite 14 true
set &V = mousev - &T
set &S = (mouseh - spriteh[10])
set &T = (mousev - spritev[10])
set &H = mouseh
set &V = mousev
IF STILLDOWN THEN SKIP 3
425
EXIT
IF ABS(mouseH-&H) > 1 THEN SKIP 3
IF ABS(mouseV-&V) > 1 THEN SKIP 2
SKIP -5
set &A = 1
WHEN MOUSEUP THEN CALL c17ˇˇ